home *** CD-ROM | disk | FTP | other *** search
/ Asia X / Asia X.iso / mac / SHARED.DIR / 00181.ls < prev    next >
Encoding:
Text File  |  1995-08-23  |  1.2 KB  |  56 lines
  1. on exitFrame
  2.   global slideSpeed, gSong
  3.   puppetSprite(43, 1)
  4.   puppetSprite(44, 1)
  5.   puppetSprite(45, 1)
  6.   if gSong = 1 then
  7.     set the locH of sprite 43 to 102
  8.   end if
  9.   if gSong = 2 then
  10.     set the locH of sprite 43 to 175
  11.   end if
  12.   if gSong = 3 then
  13.     set the locH of sprite 43 to 248
  14.   end if
  15.   if gSong = 4 then
  16.     set the locH of sprite 43 to 324
  17.   end if
  18.   if gSong = 5 then
  19.     set the locH of sprite 43 to 395
  20.   end if
  21.   if slideSpeed = 1 then
  22.     set the locH of sprite 44 to 397
  23.   end if
  24.   if slideSpeed = 2 then
  25.     set the locH of sprite 44 to 260
  26.   end if
  27.   if slideSpeed = 3 then
  28.     set the locH of sprite 44 to 99
  29.   end if
  30.   if the soundLevel = 0 then
  31.     set the locH of sprite 45 to 99
  32.   end if
  33.   if the soundLevel = 1 then
  34.     set the locH of sprite 45 to 150
  35.   end if
  36.   if the soundLevel = 2 then
  37.     set the locH of sprite 45 to 191
  38.   end if
  39.   if the soundLevel = 3 then
  40.     set the locH of sprite 45 to 231
  41.   end if
  42.   if the soundLevel = 4 then
  43.     set the locH of sprite 45 to 272
  44.   end if
  45.   if the soundLevel = 5 then
  46.     set the locH of sprite 45 to 317
  47.   end if
  48.   if the soundLevel = 6 then
  49.     set the locH of sprite 45 to 360
  50.   end if
  51.   if the soundLevel = 7 then
  52.     set the locH of sprite 45 to 396
  53.   end if
  54.   go(the frame)
  55. end
  56.